← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 15:57:08 2022
Reported on Wed Dec 14 16:00:35 2022

Filename(eval 338)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 46923 statements in 544ms
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
4691341431ms7.97sJSON::Schema::Modern::::_get_resource JSON::Schema::Modern::_get_resource
1118µs17µsJSON::Schema::Modern::::BEGIN@5.189 JSON::Schema::Modern::BEGIN@5.189
1113µs3µsMethod::Generate::Accessor::_Generated::::BEGIN@10.190Method::Generate::Accessor::_Generated::BEGIN@10.190
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
310s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4 package JSON::Schema::Modern;
5230µs226µs
# spent 17µs (8+9) within JSON::Schema::Modern::BEGIN@5.189 which was called: # once (8µs+9µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 17µs making 1 call to JSON::Schema::Modern::BEGIN@5.189 # spent 9µs making 1 call to warnings::unimport
6
# spent 7.97s (431ms+7.54) within JSON::Schema::Modern::_get_resource which was called 46913 times, avg 170µs/call: # 39123 times (360ms+6.44s) by JSON::Schema::Modern::_get_or_load_resource at line 807 of JSON/Schema/Modern.pm, avg 174µs/call # 7758 times (70.8ms+1.10s) by JSON::Schema::Modern::_fetch_from_uri at line 877 of JSON/Schema/Modern.pm, avg 150µs/call # 24 times (137µs+1.24ms) by JSON::Schema::Modern::__ANON__[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/JSON/Schema/Modern.pm:672] at line 648 of JSON/Schema/Modern.pm, avg 57µs/call # 8 times (68µs+1.66ms) by JSON::Schema::Modern::_get_or_load_resource at line 829 of JSON/Schema/Modern.pm, avg 216µs/call
sub _get_resource {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@10.190 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 2018;
1211µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1312µs %^H = (
14 );
15128µs13µs}
16# END quote_sub PRELUDE
1746913544ms1407397.54sshift->_assert__resource_index->${\Data::Perl::Collection::Hash::MooseLike->can("get")}(@_); }
# spent 7.22s making 46913 calls to Data::Perl::Collection::Hash::MooseLike::get, avg 154µs/call # spent 166ms making 46913 calls to JSON::Schema::Modern::_assert__resource_index, avg 4µs/call # spent 152ms making 46913 calls to UNIVERSAL::can, avg 3µs/call
1811µs $$_UNQUOTED = \&_get_resource;
19}
2013µs1;
21
22;